home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 1
/
CD Fun House (Wayzata Technology).iso
/
•Interesting Stuff•
/
I-CHING v1.0 •••
/
I-CHING v1.0 еее
/
card_10048.txt
< prev
next >
Wrap
Text File
|
1990-10-02
|
2KB
|
70 lines
-- card: 10048 from stack: in.0 –µ–µ–µ
-- bmap block id: 8406
-- flags: 0000
-- background id: 2604
-- name:
-- part 1 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=369 top=259 right=297 bottom=415
-- title width / last selected line: 0
-- icon id / first selected line: 14953 / 14953
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
set userlevel to 2
click at loc of card field "Funny"
type "Keep the dream alive... "
wait 2 seconds
delete line one in card field "Funny"
delete line one in card field "Funny"
delete line one in card field "Funny"
delete line one in card field "Funny"
delete line one in card field "Funny"
delete line one in card field "Funny"
click at loc of card field "Funny"
type "Support FreeWare! "
wait 2 seconds
delete line one in card field "Funny"
delete line one in card field "Funny"
delete line one in card field "Funny"
delete line one in card field "Funny"
delete line one in card field "Funny"
delete line one in card field "Funny"
click at loc of card field "Funny"
type "Thank you!"
wait 1 seconds
delete line one in card field "Funny"
delete line one in card field "Funny"
delete line one in card field "Funny"
delete line one in card field "Funny"
delete line one in card field "Funny"
delete line one in card field "Funny"
set userlevel to 1
visual effect wipe right
go to card id 2951
end mouseUp
-- part 2 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=63 top=192 right=305 bottom=266
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: Funny